home *** CD-ROM | disk | FTP | other *** search
/ Aminet 39 / Aminet 39 (2000)(Schatztruhe)[!][Oct 2000].iso / Aminet / gfx / misc / ArteffectScrip.lha / ArteffectLoadPiccy.rexx next >
Encoding:
OS/2 REXX Batch file  |  2000-08-20  |  653 b   |  19 lines
  1. /* err, script to load a picture into ArtEffect on startup*/
  2. /* created with the help of Neil Bothwick and a couple of others */
  3. /* whose names slip my mind atm.. :-/ Soz */
  4. /* If you make any changes to it, let me know and send me a copy to: */
  5. /* stom@redhotant.com */
  6.  
  7. parse arg pic
  8. address command
  9.  
  10. if ~show('P','ArtEffect') then  'Run >NIL: Programs:ArtEffect/ArtEffect' 
  11. do i=1 to 6 until RC = 0;'waitforport ArtEffect';end
  12.  
  13.  
  14.  
  15. address 'ArtEffect' 'loadpic' pic
  16.  
  17.  
  18. if RC > 0 then address command 'requestchoice >NIL: "ArtEffect Load Error...""Sorry, ArtEffect could not load the image*n*n'pic'*n*n*nPlease check the file name/format""Ok, thanks"'
  19.